object frmBloqueio: TfrmBloqueio
  Left = 325
  Top = 149
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = 'Bloqueio de Entidades'
  ClientHeight = 472
  ClientWidth = 410
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  OldCreateOrder = False
  Position = poScreenCenter
  ShowHint = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object SpeedButton1: TSpeedButton
    Left = 11
    Top = 25
    Width = 366
    Height = 22
    Caption = 'Carregar Entidades'
    Flat = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
      333333333333337FF3333333333333903333333333333377FF33333333333399
      03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
      99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
      99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
      03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
      33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
      33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
      3333777777333333333333333333333333333333333333333333}
    NumGlyphs = 2
    ParentFont = False
    OnClick = SpeedButton1Click
  end
  object bOpcao: TSpeedButton
    Left = 382
    Top = 25
    Width = 23
    Height = 22
    Hint = 'Mais op'#231#245'es'
    AllowAllUp = True
    GroupIndex = 1
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
      333333333337F33333333333333033333333333333373F333333333333090333
      33333333337F7F33333333333309033333333333337373F33333333330999033
      3333333337F337F33333333330999033333333333733373F3333333309999903
      333333337F33337F33333333099999033333333373333373F333333099999990
      33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
      33333333337F7F33333333333309033333333333337F7F333333333333090333
      33333333337F7F33333333333309033333333333337F7F333333333333090333
      33333333337F7F33333333333300033333333333337773333333}
    NumGlyphs = 2
    ParentFont = False
    OnClick = bOpcaoClick
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 65
    Width = 398
    Height = 369
    Caption = 'Entidades:'
    TabOrder = 1
    object ckLst: TCheckListBox
      Left = 5
      Top = 17
      Width = 387
      Height = 347
      Color = clWhite
      Ctl3D = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Courier New'
      Font.Style = []
      ItemHeight = 14
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 0
    end
  end
  object BitBtn1: TBitBtn
    Left = 10
    Top = 439
    Width = 75
    Height = 25
    Caption = 'Bloquear'
    TabOrder = 2
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 328
    Top = 439
    Width = 75
    Height = 25
    Caption = 'Cancelar'
    TabOrder = 3
    OnClick = BitBtn2Click
  end
  object pb: TProgressBar
    Left = 116
    Top = 443
    Width = 177
    Height = 17
    TabOrder = 4
  end
  object ckTodos: TCheckBox
    Left = 281
    Top = 62
    Width = 122
    Height = 17
    Caption = 'Selecionar Todos'
    Checked = True
    State = cbChecked
    TabOrder = 5
    OnClick = ckTodosClick
  end
  object pnlOpcoes: TPanel
    Left = 8
    Top = 50
    Width = 397
    Height = 89
    BevelInner = bvLowered
    TabOrder = 6
    Visible = False
    object Label1: TLabel
      Left = 8
      Top = 32
      Width = 64
      Height = 13
      Caption = 'N.'#186' de dias'
    end
    object ckCompra: TCheckBox
      Left = 8
      Top = 8
      Width = 241
      Height = 17
      Caption = 'Incluir Entidades que n'#227'o compram a'
      TabOrder = 0
      OnClick = ckCompraClick
    end
    object edDias: TSpinEdit
      Left = 8
      Top = 48
      Width = 113
      Height = 22
      Enabled = False
      MaxLength = 3
      MaxValue = 0
      MinValue = 0
      TabOrder = 1
      Value = 0
      OnKeyDown = edDiasKeyDown
    end
  end
  object ckVenc: TCheckBox
    Left = 13
    Top = 5
    Width = 300
    Height = 17
    Caption = 'Incluir entidades com t'#237'tulos vencidos'
    Checked = True
    State = cbChecked
    TabOrder = 0
  end
  object CDS: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 24
    Top = 128
    object CDSEnt_Codigo: TStringField
      FieldName = 'Ent_Codigo'
      Size = 5
    end
    object CDSEnt_Nome: TStringField
      FieldName = 'Ent_Nome'
      Size = 30
    end
    object CDSData: TStringField
      FieldName = 'Data'
      Size = 10
    end
  end
end
